home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Resource Library: Multimedia
/
Resource Library: Multimedia.iso
/
hypercrd
/
nwmxcmsm
/
txhelpse.hqx
/
txhelp
/
stack.txt
< prev
Wrap
Text File
|
1991-08-29
|
4KB
|
127 lines
-- stack: in
-- format: 10 (HyperCard 2)
-- flags: 0x1000 (none)
-- protect password hash: 0
-- maximum user level: 5 (scripting)
-- window: Rect(x1=0, y1=0, x2=0, y2=0)
-- screen: Rect(x1=0, y1=0, x2=0, y2=0)
-- card dimensions: w=0 h=0
-- scroll: x=0 y=0
-- background count: 1
-- first background id: 2684
-- card count: 4
-- first card id: 3030
-- list block id: 2217
-- print block id: 3340
-- font table block id: 5666
-- style table block id: 5537
-- free block count: 1
-- free size: 7808 bytes
-- total size: 49152 bytes
-- stack block size: 3584 bytes
-- created by hypercard version: 0x01258000
-- compacted by hypercard version: 0x02018000
-- modified by hypercard version: 0x02018000
-- opened by hypercard version: 0x02018000
-- patterns[0]: 0x0000000000000000
-- patterns[1]: 0x8000000008000000
-- patterns[2]: 0x8800220088002200
-- patterns[3]: 0x8888222288882222
-- patterns[4]: 0x88AA22AA88AA22AA
-- patterns[5]: 0xCCAA33AACCAA33AA
-- patterns[6]: 0xEEAABBAAEEAABBAA
-- patterns[7]: 0xEEBBBBEEEEBBBBEE
-- patterns[8]: 0xFFBBFFEEFFBBFFEE
-- patterns[9]: 0xFFBBFFFFFFBBFFFF
-- patterns[10]: 0x8010022001084004
-- patterns[11]: 0xFFFFFFFFFFFFFFFF
-- patterns[12]: 0x8822882288228822
-- patterns[13]: 0x1122448811224488
-- patterns[14]: 0xC4800C6843023026
-- patterns[15]: 0xB130031BD8C00C8D
-- patterns[16]: 0xAA00AA00AA00AA00
-- patterns[17]: 0x8822552288225522
-- patterns[18]: 0x8855225588552255
-- patterns[19]: 0x77DD77DD77DD77DD
-- patterns[20]: 0x8000000000000000
-- patterns[21]: 0xAA55AA55AA55AA55
-- patterns[22]: 0x038448300C020101
-- patterns[23]: 0x8244394482010101
-- patterns[24]: 0x8814224188412214
-- patterns[25]: 0x8080413E080814E3
-- patterns[26]: 0x22048C7422179810
-- patterns[27]: 0xBE808808EB088880
-- patterns[28]: 0x25C8328964244C92
-- patterns[29]: 0xA29C41BE2AC914EB
-- patterns[30]: 0x40A00000040A0000
-- patterns[31]: 0x8040200002040800
-- patterns[32]: 0xAA00800088008000
-- patterns[33]: 0xFF80808080808080
-- patterns[34]: 0x081C22C180010204
-- patterns[35]: 0xFF808080FF080808
-- patterns[36]: 0xF87422478F172271
-- patterns[37]: 0xBF00BFBFB0B0B0B0
-- patterns[38]: 0xFF7FBE5DA2418000
-- patterns[39]: 0xFAF5FAF5A050A050
-- checksum: 0x641F4AB7
----- HyperTalk script -----
on openStack
global searchit
global menu1,menu2
put newMenu("Water","Find it","Get it","Humans","Biological diversity", "A Difference","(-","Main Menu","(-","Water Help") into menu1
put newMenu("Video","Laser","Tape") into menu2
end openStack
on closeStack
global menu1,menu2
put deleteMenu(menu1) into menu1
put deleteMenu(menu2) into menu2
end closeStack
on doMenu which
global menu1,menu2
if which is "Find it" then
visual effect dissolve slow to black
wait 5
visual effect dissolve slow
go to stack "where we find water"
else if which is "Get it" then
visual effect dissolve slow to black
wait 5
visual effect dissolve slow
go to stack "where we get water"
else if which is "Humans" then
visual effect dissolve slow to black
wait 5
visual effect dissolve slow
go to stack "human adaptation"
else if which is "Biological diversity" then
visual effect dissolve slow to black
wait 5
visual effect dissolve slow
go to stack "biological diversity"
else if which is "A Difference" then
visual effect dissolve slow to black
wait 5
visual effect dissolve slow
go to stack "we make a difference"
else if which is "Main Menu" then
visual effect dissolve slow to black
wait 5
visual effect dissolve slow
go to stack "database-1"
else if which is "Water Help" then
visual effect dissolve slow to black
wait 5
visual effect dissolve slow
go to card "help" in stack "database-1"
else if which is "Laser" then
answer "Coming soon to a Laser Optical Disk Player!" with "OK"
else if which is "Tape" then
answer "You have got to be kidding!" with "OK"
else
pass doMenu
end if
end doMenu